Imports DocumentFormat.OpenXml.Packaging
Imports System.Text
Imports System.IO
Public Class WordPackage

    Dim _wordpackage As WordPackage
    Dim _doc As WordprocessingDocument
    Public Property Document() As WordPackage
        Get

        End Get
        Set(ByVal value As WordPackage)

        End Set
    End Property
    Public Property Document() As WordprocessingDocument
        Get
            Return _doc
        End Get
        Set(ByVal value As WordprocessingDocument)
            _doc = value
        End Set
    End Property
    Public Function Open(ByVal path As String, ByVal readwrite As Boolean)
        _wordpackage = WordprocessingDocument.Open(path, readwrite)
        Return _wordpackage
    End Function
    Public Function Open(ByVal stream As System.IO.Stream, ByVal readwrite As Boolean)
        _wordpackage = WordprocessingDocument.Open(stream, readwrite)
        Return _wordpackage
    End Function
    Public Function Open(ByVal wpd As WordprocessingDocument)
        _wordpackage = wp
        Return _wordpackage
    End Function


End Class
